home *** CD-ROM | disk | FTP | other *** search
/ Aminet 4 / Aminet 4 - November 1994.iso / aminet / comm / bbs / fax_it_cnet.lzh / FAX-IT / answer.gpf next >
Text File  |  1994-08-20  |  516b  |  27 lines
  1. /*
  2.  * FAX just came in!
  3.  *
  4.  * If you use this script with the GPFax program, incoming FAXes will be
  5.  * logged to your standard FAX log that is created with in the FAX-IT
  6.  * programs.
  7.  *
  8.  * See the GPFax manual for instructions on how to use this script when
  9.  * a FAX comes in.
  10.  */
  11.  
  12. options results
  13.  
  14. Address CnetRexx0
  15. LogFAX = 'Logs:FAX.log'
  16.  
  17. if ~exists(LogFAX) then do
  18.     open(LogFile,LogFAX,'Write')
  19.     close(LogFile)
  20. end
  21.  
  22. open(file,'systext:Logs/FAX','APPEND')
  23. ReportLog R 8
  24. text=result
  25. writeln(file,text)
  26. close(file)
  27.